`timescale 1 ns / 100 ps

module BinaryToBCD_tb;

	reg  [7:0] binary_in;
	wire [7:0] bcd_out;

	BinaryToBCD dut (
		binary_in,
		bcd_out
	);

	integer i;

	initial begin
		$display("Starting");

		for (i = 0; i < 100; i = i + 1) begin
			binary_in = i;
			#10;
		end

		$display("Ending");
		$stop;
	end

endmodule
